home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / PROGTOOL / FGL304E.ZIP;1 / EXPAS.ARJ / FGDOC / EXAMPLES / PASCAL / 01-01.PAS next >
Encoding:
Pascal/Delphi Source File  |  1994-01-24  |  236 b   |  14 lines
  1. program main;
  2. uses fgmain;
  3.  
  4. var
  5.   Major : integer;
  6.   Minor : integer;
  7.   Version : real;
  8.  
  9. begin
  10.   fg_version(Major,Minor);
  11.   Version := Major + Minor * 0.01;
  12.   writeln('This is version ',Version:4:2,' of Fastgraph.');
  13. end.
  14.